home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / latex209 / contrib / fac / fac.sty < prev    next >
Text File  |  1991-10-19  |  25KB  |  826 lines
  1. % Springer Journal FAC document style -- V1.00 released 27 September 1991
  2. % for LaTeX version 2.09
  3. % Copyright (C) 1991 Cambridge University Press
  4. %
  5. % based on the original LaTeX ARTICLE DOCUMENT STYLE
  6. %
  7. \typeout{Document Style `FAC journal style'. V1.00 Released 27 September 1991}
  8. %
  9. %  Journals use two-sided printing.
  10. %
  11. \@twosidetrue
  12. \@mparswitchtrue
  13. \def\ds@draft{\overfullrule 5pt}
  14. \@options
  15.  
  16.  
  17. %  ****************************************
  18. %  *               FONTS                  *
  19. %  ****************************************
  20. %
  21. \lineskip 1pt
  22. \normallineskip 1pt
  23. \def\baselinestretch{1}
  24. \def\@normalsize{\@setsize\normalsize{11pt}\xpt\@xpt
  25.  \abovedisplayskip 6pt plus 1pt minus 1pt
  26.  \belowdisplayskip \abovedisplayskip
  27.  \abovedisplayshortskip 3pt plus 1pt
  28.  \belowdisplayshortskip  \abovedisplayshortskip
  29.  \let\@listi\@listI}
  30. \def\small{\@setsize\small{9pt}\viiipt\@viiipt
  31.  \abovedisplayskip 6pt plus 1pt minus 1pt
  32.  \belowdisplayskip \abovedisplayskip
  33.  \abovedisplayshortskip 3pt plus 1pt
  34.  \belowdisplayshortskip  \abovedisplayshortskip
  35.  \def\@listi{\leftmargin\leftmargini
  36.   \topsep 2pt plus 1pt minus 1pt
  37.   \parsep \z@
  38.   \itemsep 2pt}}
  39. \def\footnotesize{\@setsize\footnotesize{9pt}\viiipt\@viiipt
  40.  \abovedisplayskip 5pt plus 1pt minus 1pt
  41.  \belowdisplayskip \abovedisplayskip
  42.  \abovedisplayshortskip \z@ plus 1pt
  43.  \belowdisplayshortskip  \abovedisplayshortskip
  44.  \def\@listi{\leftmargin\leftmargini
  45.   \topsep 2pt plus 1pt minus 1pt
  46.   \parsep \z@
  47.   \itemsep 2pt}}
  48. \def\indexsize{\@setsize\indexsize{9pt}\viiipt\@viiipt}
  49. \def\scriptsize{\@setsize\scriptsize{8pt}\viipt\@viipt}
  50. \def\tiny{\@setsize\tiny{6pt}\vpt\@vpt}
  51. \def\medium{\@setsize\large{12pt}\xipt\@xipt}
  52. \def\large{\@setsize\large{14pt}\xiipt\@xiipt}
  53. \def\Large{\@setsize\Large{16pt}\xivpt\@xivpt}
  54. \def\LARGE{\@setsize\LARGE{18pt}\xviipt\@xviipt}
  55. \def\huge{\@setsize\huge{25pt}\xxpt\@xxpt}
  56. \def\Huge{\@setsize\Huge{30pt}\xxvpt\@xxvpt}
  57. \normalsize
  58.  
  59.  
  60. %  ****************************************
  61. %  *            PAGE LAYOUT               *
  62. %  ****************************************
  63. %
  64. % SIDE MARGINS:
  65. \oddsidemargin  2pc
  66. \evensidemargin 2pc
  67. \marginparwidth 2.0cm
  68. \marginparsep 10pt
  69.  
  70. % VERTICAL SPACING:
  71. \topmargin 3pc
  72. \headheight 11pt
  73. \headsep   11pt
  74. \topskip = 11pt
  75. \footheight 11pt
  76. \footskip 26pt
  77.  
  78. % DIMENSION OF TEXT:
  79. \textheight = 50\baselineskip \advance\textheight by \topskip
  80. \textwidth 29pc
  81. \columnsep 10pt
  82. \columnseprule 0pt
  83.  
  84. % FOOTNOTES:
  85. \footnotesep 6.65pt
  86. \skip\footins 16.5pt plus 12pt minus 1pt
  87.  
  88. % FLOATS:
  89. \floatsep 11pt plus 5.5pt minus 1pt
  90. \textfloatsep 15pt plus 4.5pt minus 3pt
  91. \intextsep 11pt plus 5.5pt minus 2pt
  92. \@maxsep 15pt
  93. \dblfloatsep 11pt plus 5.5pt minus 2pt
  94. \dbltextfloatsep 15pt plus 4.5pt minus 3pt
  95. \@dblmaxsep 15pt
  96. \@fptop 0pt plus 0fil
  97. \@fpsep 11pt plus 0fil
  98. \@fpbot 0pt plus 3fil
  99. \@dblfptop 0pt plus 0fil
  100. \@dblfpsep 11pt plus 0fil
  101. \@dblfpbot 0pt plus 3fil
  102. \marginparpush 5pt
  103.  
  104.  
  105. %  ****************************************
  106. %  *           PARAGRAPHING               *
  107. %  ****************************************
  108. %
  109. \parskip \z@ plus .3pt
  110. \parindent 1.5em
  111. \partopsep 0pt plus 1pt
  112. \@lowpenalty   51
  113. \@medpenalty  151
  114. \@highpenalty 301
  115. \@beginparpenalty -\@lowpenalty
  116. \@endparpenalty -\@lowpenalty
  117. \@itempenalty -\@lowpenalty
  118. \clubpenalty=0
  119. \widowpenalty=10000
  120.  
  121.  
  122. %  ****************************************
  123. %  *                 PARTS                *
  124. %  ****************************************
  125. %
  126. \def\part{\par \addvspace{4ex}\@afterindentfalse
  127.  \secdef\@part\@spart}
  128. \def\@part[#1]#2{\ifnum \c@secnumdepth >\m@ne
  129.   \refstepcounter{part}
  130.   \addcontentsline{toc}{part}{Part \thepart: #1}
  131.  \else \addcontentsline{toc}{part}{#1}
  132.  \fi
  133.  {\parindent 0pt \raggedright
  134.   \ifnum \c@secnumdepth >\m@ne
  135.    \large\rm PART
  136.    \ifcase\thepart \or ONE \or TWO \or THREE \or FOUR \or FIVE
  137.     \or SIX \or SEVEN \or EIGHT \or NINE \or TEN \else \fi
  138.    \par \nobreak
  139.   \fi
  140.   \LARGE \rm #2 \markboth{}{}\par }
  141.  \nobreak \vskip 3ex \@afterheading}
  142. \def\@spart#1{{\parindent 0pt \raggedright
  143.   \LARGE \rm #1\par}
  144.  \nobreak \vskip 3ex \@afterheading}
  145.  
  146.  
  147. %  ****************************************
  148. %  *               SECTIONS               *
  149. %  ****************************************
  150. %
  151. \def\section{\@startsection {section}{1}{\z@}
  152.  {-19pt plus -5.5pt minus -2.25pt}
  153.  {11pt plus 0pt minus 1pt}
  154.  {\raggedright\large\bf}}
  155. \def\subsection{\@startsection{subsection}{2}{\z@}
  156.  {-21pt plus -2.25pt minus -2.25pt}
  157.  {11pt plus 0pt minus 1pt}
  158.  {\raggedright\medium\bf}}
  159. \def\subsubsection{\@startsection{subsubsection}{3}{\z@}
  160.  {-11pt plus -2.25pt minus -2.25pt}
  161.  {11pt plus 0pt minus 1pt}
  162.  {\raggedright\normalsize\it}}
  163. \def\paragraph{\@startsection{paragraph}{4}{\z@}
  164.  {11pt plus 2.25pt minus 1pt}
  165.  {-0.5em}
  166.  {\normalsize\bf}}
  167. \def\subparagraph{\@startsection{subparagraph}{4}{\parindent}
  168.  {11pt plus 2.25pt minus 1pt}
  169.  {-0.5em}
  170.  {\normalsize\it}}
  171. \setcounter{secnumdepth}{3}
  172. %
  173. \def\@sect#1#2#3#4#5#6[#7]#8{%
  174.  \ifnum #2>\c@secnumdepth
  175.   \def\@svsec{}%
  176.  \else
  177.   \refstepcounter{#1}
  178.   \edef\@svsec{\csname the#1\endcsname.\hskip 0.5em }% modified for 1en
  179.  \fi
  180.  \@tempskipa #5\relax
  181.  \ifdim \@tempskipa>\z@
  182.   \begingroup #6\relax
  183.    \@hangfrom{\hskip #3\relax\@svsec}{\interlinepenalty \@M #8\par}
  184.   \endgroup
  185.   \csname #1mark\endcsname{#7}%
  186.   \addcontentsline{toc}{#1}{\ifnum #2>\c@secnumdepth \else
  187.    \protect\numberline{\csname the#1\endcsname}\fi #7}
  188.  \else
  189.   \def\@svsechd{#6\hskip #3\@svsec #8\csname #1mark\endcsname
  190.     {#7}\addcontentsline{toc}{#1}{\ifnum #2>\c@secnumdepth \else
  191.       \protect\numberline{\csname the#1\endcsname}\fi#7}}%
  192.  \fi
  193.  \@xsect{#5}}
  194. \def\appendix{\par
  195.  \setcounter{section}{0}
  196.  \setcounter{subsection}{0}
  197.  \def\thesection{\Alph{section}}}
  198.  
  199.  
  200. %  ****************************************
  201. %  *       PARTS & SECTIONS NUMBERS       *
  202. %  ****************************************
  203. %
  204. \newcounter{part}
  205. \newcounter {section}
  206. \newcounter {subsection}[section]
  207. \newcounter {subsubsection}[subsection]
  208. \newcounter {paragraph}[subsubsection]
  209. \newcounter {subparagraph}[paragraph]
  210. \def\thepart          {\arabic{part}}
  211. \def\thesection       {\arabic{section}}
  212. \def\thesubsection    {\thesection.\arabic{subsection}}
  213. \def\thesubsubsection {\thesubsection .\arabic{subsubsection}}
  214. \def\theparagraph     {\thesubsubsection.\arabic{paragraph}}
  215. \def\thesubparagraph  {\theparagraph.\arabic{subparagraph}}
  216.  
  217.  
  218. %  ****************************************
  219. %  *               SKIPS                  *
  220. %  ****************************************
  221. %
  222. \newskip\@indentskip
  223. \newskip\smallindent
  224. \newskip\@footindent
  225. \newskip\@leftskip
  226. \@indentskip=1.5em
  227. \smallindent=1.5em
  228. \@footindent=\smallindent
  229. \@leftskip=\z@
  230.  
  231.  
  232. %  ****************************************
  233. %  *                LISTS                 *
  234. %  ****************************************
  235. %
  236. \leftmargini   \@indentskip
  237. \leftmarginii  1.25pc
  238. \leftmarginiii 1.25pc
  239. \leftmarginiv  1.25pc
  240. \leftmarginv   1pc
  241. \leftmarginvi  1pc
  242. \leftmargin\leftmargini
  243. \labelsep 0.5em
  244. \labelwidth\leftmargini\advance\labelwidth-\labelsep
  245. %
  246. % label macros for Range-Left and Range-Right labels
  247. \def\makeRLlabel#1{\rlap{#1}\hss}
  248. \def\makeRRlabel#1{\hss\llap{#1}}
  249. %
  250. \def\@listI{\leftmargin\leftmargini
  251.  \parsep \z@
  252.  \topsep 6pt plus 1pt minus 1pt
  253.  \itemsep 2pt plus 1pt minus 0.5pt
  254. % \let\makelabel\makeRRlabel
  255. }
  256. \let\@listi\@listI
  257. \@listi
  258. \def\@listii{\leftmargin\leftmarginii
  259.  \labelwidth\leftmarginii\advance\labelwidth-\labelsep
  260.  \topsep 6pt plus 1pt minus 1pt
  261.  \parsep \z@
  262.  \itemsep 2pt
  263.  \let\makelabel\makeRRlabel
  264. }
  265. \def\@listiii{\leftmargin\leftmarginiii
  266.  \labelwidth\leftmarginiii\advance\labelwidth-\labelsep
  267.  \topsep 6pt plus 1pt minus 1pt
  268.  \parsep \z@
  269.  \partopsep \z@
  270.  \itemsep \topsep
  271.  \let\makelabel\makeRRlabel
  272. }
  273. \def\@listiv{\leftmargin\leftmarginiv
  274.  \labelwidth\leftmarginiv\advance\labelwidth-\labelsep
  275.  \let\makelabel\makeRRlabel}
  276. \def\@listv{\leftmargin\leftmarginv
  277.  \labelwidth\leftmarginv\advance\labelwidth-\labelsep
  278.  \let\makelabel\makeRRlabel}
  279. \def\@listvi{\leftmargin\leftmarginvi
  280.  \labelwidth\leftmarginvi\advance\labelwidth-\labelsep
  281.  \let\makelabel\makeRRlabel}
  282. %
  283. % ITEMIZE
  284. \def\itemize{\ifnum \@itemdepth >3 \@toodeep
  285.   \else \advance\@itemdepth \@ne
  286.    \edef\@itemitem{labelitem\romannumeral\the\@itemdepth}%
  287.    \list{\csname\@itemitem\endcsname}%
  288.     {\let\makelabel\makeRRlabel}%
  289.   \fi}
  290. \def\labelitemi{$\bullet$}
  291. \def\labelitemii{--}
  292. \def\labelitemiii{$\cdot$}
  293. \def\labelitemiv{*}
  294. %
  295. % ENUMERATE
  296. % SFB -- enumerate with optional argument to set left margin...
  297. \def\enumerate{\ifnum \@enumdepth >3 \@toodeep \else
  298.   \advance\@enumdepth \@ne
  299.   \edef\@enumctr{enum\romannumeral\the\@enumdepth}%
  300.  \fi
  301.  \@ifnextchar [{\@enumeratetwo}{\@enumerateone}%
  302. }
  303. \def\@enumeratetwo[#1]{%
  304.  \list{\csname label\@enumctr\endcsname}%
  305.   {\settowidth\labelwidth{[#1]}
  306.    \leftmargin\labelwidth \advance\leftmargin\labelsep
  307.    \usecounter{\@enumctr}
  308.    \let\makelabel\makeRRlabel}
  309. }
  310. \def\@enumerateone{%
  311.  \list{\csname label\@enumctr\endcsname}%
  312.   {\usecounter{\@enumctr}
  313.    \let\makelabel\makeRRlabel}}
  314. %
  315. \def\labelenumi{\theenumi}
  316. \def\theenumi{\arabic{enumi}.} % SFB v 0.09
  317. \def\labelenumii{(\theenumii)}
  318. \def\theenumii{\alph{enumii}}
  319. \def\p@enumii{\theenumi}
  320. \def\labelenumiii{\theenumiii}
  321. \def\theenumiii{\roman{enumiii}}
  322. \def\p@enumiii{\theenumi(\theenumii)}
  323. \def\labelenumiv{\theenumiv}
  324. \def\theenumiv{\Alph{enumiv}}
  325. \def\p@enumiv{\p@enumiii\theenumiii}
  326. %
  327. % DESCRIPTION
  328. \def\descriptionlabel#1{\hspace\labelsep \bf #1}
  329. \def\description{\list{}{\labelwidth\z@ \itemindent-\leftmargin
  330.   \let\makelabel\descriptionlabel}}
  331. \let\enddescription\endlist
  332.  
  333.  
  334. %  ****************************************
  335. %  *            DISPLAYED TEXT            *
  336. %  ****************************************
  337. %
  338. % VERSE
  339. \def\verse{\let\\=\@centercr
  340.  \list{}{\itemsep\z@
  341.   \itemindent -\@indentskip
  342.   \listparindent \itemindent
  343.   \rightmargin\leftmargin
  344.   \advance\leftmargin \@indentskip}\item[]}
  345. \let\endverse\endlist
  346. %
  347. % QUOTATION
  348. \def\quotation{\list{}{\listparindent \smallindent
  349. %  \itemindent\listparindent
  350.   \leftmargin\z@\rightmargin\leftmargin
  351.   \parsep 0pt plus 1pt}\item[]\small}
  352. \let\endquotation=\endlist
  353. %
  354. % QUOTE
  355. \def\quote{\list{}{\leftmargin\z@\rightmargin\leftmargin}\item[]\small}
  356. \let\endquote=\endlist
  357.  
  358.  
  359. %  ****************************************
  360. %  *         OTHER ENVIRONMENTS           *
  361. %  ****************************************
  362. %
  363. % THEOREM
  364. \def\@begintheorem#1#2{\rm \trivlist \item[\hskip \labelsep{\bf #1\ #2.}]}
  365. \def\@opargbegintheorem#1#2#3{\rm \trivlist
  366.   \item[\hskip \labelsep{\bf #1\ #2.\ (#3)}]}
  367. \def\@endtheorem{\endtrivlist}
  368. %
  369. % PROOF
  370. \def\proof{\rm \trivlist \item[\hskip \labelsep{\it Proof.}]}
  371. \def\endproof{\hspace*{1em}{\begin{picture}(6.5,6.5)%
  372.   \put(0,0){\framebox(6.5,6.5){}}\end{picture}}\endtrivlist}
  373. \@namedef{proof*}{\rm \trivlist \item[\hskip \labelsep{\it Proof.}]}
  374. \@namedef{endproof*}{\endtrivlist}
  375. \def\proofbox{\begin{picture}(6.5,6.5)%
  376.   \put(0,0){\framebox(6.5,6.5){}}\end{picture}}
  377. %
  378. % TITLEPAGE
  379. \def\titlepage{\@restonecolfalse\if@twocolumn\@restonecoltrue\onecolumn
  380.   \else \newpage \fi \thispagestyle{empty}\c@page\z@}
  381. \def\endtitlepage{\if@restonecol\twocolumn \else \newpage \fi}
  382.  
  383. % ARRAY AND TABULAR
  384. %
  385. \arraycolsep   5pt
  386. \tabcolsep     6pt
  387. \arrayrulewidth .5pt
  388. \doublerulesep 1.5pt
  389.  
  390.  % SFB v 0.09
  391. \def\tabular{\def\@halignto{}
  392.  \def\hline{\noalign{\ifnum0=`}\fi
  393.   \vskip 3pt
  394. %  \hrule \@height \arrayrulewidth
  395.    {\hbox to 0.667\textwidth{\hrulefill}}
  396.   \vskip 3pt
  397.   \futurelet \@tempa\@xhline}
  398.  \def\fullhline{\noalign{\ifnum0=`}\fi
  399.   \vskip 3pt
  400. %  \hrule \@height \arrayrulewidth
  401.    {\hbox to \textwidth{\hrulefill}}
  402.   \vskip 3pt
  403.   \futurelet \@tempa\@xhline}
  404.  \def\@xhline{\ifx\@tempa\hline
  405.    \vskip -6pt
  406.    \vskip \doublerulesep
  407.   \fi
  408.   \ifnum0=`{\fi}}
  409.   \def\@arrayrule{\@addtopreamble{\hskip -.5\arrayrulewidth
  410. %                                  \vrule \@width \arrayrulewidth
  411.                                   \hskip .5\arrayrulewidth}}
  412. \@tabular
  413. }
  414. % TABBING
  415. %
  416. \tabbingsep \labelsep
  417.  
  418. % MINIPAGE
  419. %
  420. \skip\@mpfootins = \skip\footins
  421.  
  422. % FRAMEBOX
  423. %
  424. % Space left between box and text by \fbox and \framebox.
  425. \fboxsep = 3pt
  426. % Width of rules in box made by \fbox and \framebox.
  427. \fboxrule = \arrayrulewidth
  428.  
  429.  
  430. %  ****************************************
  431. %  *         TITLE AND ABSTRACT           *
  432. %  ****************************************
  433. %
  434. \newif\if@correspondset
  435. \gdef\@correspond{\@shortauthor}
  436. \def\correspond#1{\gdef\@correspond{#1}\@correspondsettrue}
  437. \def\makecorrespond{\make@correspond}
  438. \def\make@correspond{{\def\thefootnote{\relax}
  439.   \footnotetext{\hspace*{-5pt}{\em Correspondence and offprint
  440.                 requests to\/}: \@correspond}}}
  441. \def\maketitle{\par
  442. % \begingroup
  443. %  \def\thefootnote{\fnsymbol{footnote}}
  444. %  \def\@makefnmark{\hbox to 0pt{$^{\@thefnmark}$\hss}}
  445.   \newpage \global\@topnum\z@
  446.   \@maketitle
  447.   \thispagestyle{titlepage}
  448.   \@thanks
  449.   \if@correspondset\relax\else\make@correspond\fi
  450. % \endgroup
  451. % \setcounter{footnote}{0}
  452.  \let\maketitle\relax
  453.  \let\@maketitle\relax
  454.  \gdef\@thanks{}\gdef\@author{}\gdef\@title{}\let\thanks\relax
  455. }
  456. \def\and{\end{author@tabular}\vskip 6pt\par
  457.  \begin{author@tabular}[t]{@{}l@{}}}
  458. \def\@maketitle{\newpage
  459.  \vspace*{95pt}
  460.  {\raggedright \sloppy
  461.   {\LARGE \bf \@title \par}
  462.   \vskip 11pt
  463.   {\large
  464.    \begin{author@tabular}[t]{@{}l@{}}\@author
  465.    \end{author@tabular}\par}
  466.   \vskip 11pt
  467.  }
  468.  \par\noindent
  469.  \vskip 22pt
  470. }
  471. \def\abstract{\list{}{\leftmargin\z@\rightmargin\leftmargin
  472.   \parsep 0pt plus 1pt}\item[]\normalsize{\bf Abstract.}}
  473. \def\endabstract{\endlist\titlerule}
  474. \def\keywords{\list{}{\leftmargin\z@\rightmargin\leftmargin
  475.   \parsep 0pt plus 1pt}\item[]\normalsize{\bf Keywords:}}
  476. \def\endkeywords{\endlist}
  477. \def\titlerule{\vspace{3pt}\footnoterule\vspace{7pt}\par}
  478.  
  479. \def\author@tabular{\def\@halignto{}\@authortable}
  480. \let\endauthor@tabular=\endtabular
  481. \def\author@tabcrone{{\ifnum0=`}\fi\@xtabularcr\small
  482.  \let\\=\author@tabcrtwo\ignorespaces}
  483. \def\author@tabcrtwo{{\ifnum0=`}\fi\@xtabularcr[-5pt]\small
  484.  \let\\=\author@tabcrtwo\ignorespaces}
  485. \def\@authortable{\leavevmode \hbox \bgroup $\let\@acol\@tabacol
  486.  \let\@classz\@tabclassz \let\@classiv\@tabclassiv
  487.  \let\\=\author@tabcrone \ignorespaces \@tabarray}
  488.  
  489.  
  490. %  ****************************************
  491. %  *            PAGE STYLES               *
  492. %  ****************************************
  493. %
  494. \mark{{}{}}
  495. \gdef\@author{\mbox{}}
  496. \def\author{\@ifnextchar [{\@authortwo}{\@authorone}}
  497. \def\@authortwo[#1]#2{\gdef\@author{#2}\gdef\@shortauthor{#1}}
  498. \def\@authorone#1{\gdef\@author{#1}\gdef\@shortauthor{#1}}
  499. \def\shortauthor#1{\gdef\@shortauthor{#1}}
  500. \gdef\@shortauthor{}
  501. \gdef\@title{\mbox{}}
  502. \def\title{\@ifnextchar [{\@titletwo}{\@titleone}}
  503. \def\@titletwo[#1]#2{\gdef\@title{#2}\gdef\@shorttitle{#1}}
  504. \def\@titleone#1{\gdef\@title{#1}\gdef\@shorttitle{#1}}
  505. \def\shorttitle#1{\gdef\@shorttitle{#1}}
  506. \gdef\@shorttitle{}
  507. \def\volume#1{\gdef\@volume{#1}}
  508. \gdef\@volume{3}
  509. \def\pagerange#1{\gdef\@pagerange{#1}}
  510. \gdef\@pagerange{1--000}
  511. \def\journal#1{\gdef\@journal{#1}}
  512. \gdef\@journal{Formal Aspects of Computing
  513.   (\number\year) \@volume: \@pagerange}
  514. %
  515. % \ps@empty and \ps@plain defined in LATEX.TEX
  516. %
  517. \def\ps@headings{\let\@mkboth\markboth
  518.  \def\@oddhead{\small \@shorttitle \hfill \rm \thepage}
  519.  \def\@oddfoot{}
  520.  \def\@evenhead{\small \thepage \hfill \@shortauthor}
  521.  \def\@evenfoot{}
  522.  \def\sectionmark##1{\markboth{##1}{}}
  523.  \def\subsectionmark##1{\markright{##1}}}
  524. \def\ps@myheadings{\let\@mkboth\@gobbletwo
  525.  \def\@oddhead{\it \rightmark \hfill \rm \thepage}
  526.  \def\@oddfoot{}
  527.  \def\@evenhead{\it \leftmark \hfill \rm \thepage}
  528.  \def\@evenfoot{}
  529.  \def\sectionmark##1{}
  530.  \def\subsectionmark##1{}}
  531. \def\ps@titlepage{\let\@mkboth\@gobbletwo
  532.  \def\@oddhead{\footnotesize
  533.   \raisebox{0pt}[8pt][1pt]{\parbox{0.7\textwidth}{\@journal\\
  534.   \copyright\ \number\year\ BCS}} \hfill}
  535.  \def\@oddfoot{}
  536.  \def\@evenhead{\footnotesize
  537.   \raisebox{0pt}[8pt][1pt]{\parbox{0.7\textwidth}{\@journal\\
  538.   \copyright\ \number\year\ BCS}} \hfill}
  539.  \def\@evenfoot{}
  540.  \def\sectionmark##1{}
  541.  \def\subsectionmark##1{}}
  542.  
  543.  
  544. %  ****************************************
  545. %  *         TABLE OF CONTENTS, ETC.      *
  546. %  ****************************************
  547. %
  548. \def\@pnumwidth{1.55em}
  549. \def\@tocrmarg {2.55em}
  550. \def\@dotsep{4.5}
  551. \setcounter{tocdepth}{2}
  552. \def\@undottedtocline#1#2#3#4#5{\ifnum #1>\c@tocdepth
  553.  \else
  554.   \vskip \z@ plus .2pt
  555.   {\hangindent #2\relax
  556.    \rightskip \@tocrmarg \parfillskip -\rightskip
  557.    \parindent #2\relax \@afterindenttrue
  558.    \interlinepenalty\@M \leavevmode
  559.    \@tempdima #3\relax #4\nobreak \hfill \nobreak
  560.    \hbox to\@pnumwidth{\hfil\rm \ }\par}\fi}
  561. \def\tableofcontents{\@restonecolfalse
  562.  \if@twocolumn\@restonecoltrue\onecolumn\fi
  563.  \section*{Contents} \@starttoc{toc}
  564.  \if@restonecol\twocolumn\fi \par\vspace{11pt}}
  565. \def\l@part#1#2{\addpenalty{-\@highpenalty}
  566.  \addvspace{2.25em plus 1pt}
  567.  \begingroup
  568.   \parindent \z@ \rightskip \@pnumwidth
  569.   \parfillskip -\@pnumwidth
  570.   {\normalsize\rm
  571.    \leavevmode \hspace*{3pc}
  572.    #1\hfil \hbox to\@pnumwidth{\hss \ }}\par
  573.    \nobreak \global\@nobreaktrue
  574.    \everypar{\global\@nobreakfalse\everypar{}}\endgroup}
  575. \def\l@section#1#2{\addpenalty{\@secpenalty}
  576.  \@tempdima 1.5em
  577.  \begingroup
  578.   \parindent \z@ \rightskip \@pnumwidth
  579.   \parfillskip -\@pnumwidth \rm \leavevmode
  580.   \advance\leftskip\@tempdima \hskip -\leftskip
  581.   #1\nobreak\hfil \nobreak\hbox to\@pnumwidth{\hss \ }\par
  582.  \endgroup}
  583. \def\l@subsection{\@undottedtocline{2}{1.5em}{2.3em}}
  584. \def\l@subsubsection{\@undottedtocline{3}{3.8em}{3.2em}}
  585. \def\l@paragraph{\@undottedtocline{4}{7.0em}{4.1em}}
  586. \def\l@subparagraph{\@undottedtocline{5}{10em}{5em}}
  587. \def\listoffigures{\@restonecolfalse
  588.  \if@twocolumn\@restonecoltrue\onecolumn\fi
  589.  \section*{List of Figures\@mkboth{List of Figures}{List of Figures}}
  590.  \@starttoc{lof} \if@restonecol\twocolumn\fi}
  591. \def\l@figure{\@undottedtocline{1}{1.5em}{2.3em}}
  592. \def\listoftables{\@restonecolfalse
  593.  \if@twocolumn\@restonecoltrue\onecolumn\fi
  594.  \section*{List of Tables\@mkboth{List of Tables}{List of Tables}}
  595.  \@starttoc{lot} \if@restonecol\twocolumn\fi}
  596. \let\l@table\l@figure
  597.  
  598.  
  599. %  ****************************************
  600. %  *             BIBLIOGRAPHY             *
  601. %  ****************************************
  602. %
  603. \def\thebibliography#1{\section*{References}
  604.  \addcontentsline{toc}{section}{References}
  605.  % SFB v 0.09
  606.  \list{[\arabic{enumi}]}{\labelwidth3.5pc
  607.          \leftmargin 3.5pc \advance\leftmargin\labelsep
  608.      \itemsep 0pt
  609.          \usecounter{enumi}
  610.      \let\makelabel=\makeRLlabel
  611. }
  612.  \small \parindent\z@
  613.  \parskip\z@ plus .1pt\relax
  614.  \def\newblock{\hskip .11em plus .33em minus .07em}
  615.  \sloppy\clubpenalty4000\widowpenalty4000
  616.  \sfcode`\.=1000\relax
  617. }
  618. \let\endthebibliography=\endlist
  619. \def\@biblabel#1{[#1]}
  620.  
  621.  
  622. %  ****************************************
  623. %  *              THE INDEX               *
  624. %  ****************************************
  625. %
  626. \newif\if@restonecol
  627. \def\theindex{\section*{Index}
  628.  \addcontentsline{toc}{section}{Index}
  629.  \footnotesize \parindent\z@ \parskip\z@ plus .1pt\relax
  630.  \let\item\@idxitem}
  631. \def\@idxitem{\par\hangindent 1em}
  632. \def\subitem {\par\hangindent 1em \hspace*{1em}}
  633. \def\subsubitem{\par\hangindent 1em\hspace*{1em}}
  634. \def\endtheindex{\if@restonecol\onecolumn\else\clearpage\fi}
  635. \def\indexspace{\par\vskip\baselineskip \relax}
  636.  
  637.  
  638. %  ****************************************
  639. %  *             FOOTNOTES                *
  640. %  ****************************************
  641. %
  642. \def\footnoterule{\kern-3\p@
  643.  \hrule width 12pc height .5pt \kern 3\p@}
  644.  
  645. \long\def\@makefntext#1{\parindent 1em\noindent
  646.   $^{\@thefnmark}$\hspace{4pt}#1}
  647.  
  648.  
  649. %  ****************************************
  650. %  *         FIGURES AND TABLES           *
  651. %  ****************************************
  652. %
  653. \setcounter{topnumber}{2}
  654. \def\topfraction{.9}
  655. \setcounter{bottomnumber}{1}
  656. \def\bottomfraction{.9}
  657. \setcounter{totalnumber}{3}
  658. \def\textfraction{.1}
  659. \def\floatpagefraction{.75}
  660. \setcounter{dbltopnumber}{2}
  661. \def\dbltopfraction{.9}
  662. \def\dblfloatpagefraction{.5}
  663.  
  664. \newcounter{table}
  665. \def\thetable{\@arabic\c@table}
  666. \def\fps@table{tbp}
  667. \def\ftype@table{1}
  668. \def\ext@table{lot}
  669. \def\fnum@table{Table \thetable}
  670. \def\table{\@float{table}}
  671. \let\endtable\end@float
  672. \@namedef{table*}{\@dblfloat{table}}
  673. \@namedef{endtable*}{\end@dblfloat}
  674. \def\fstyle@table{\small\rm}
  675. \def\fjust@table{\sloppy}
  676. \def\fcapjust@table{\sloppy}
  677. \def\fcapsize@table{\small\bf}
  678. \def\fcapstyle@table{\small\rm}
  679. \long\def\@makecaption@table#1#2{\vskip 5.5pt
  680.  \setbox\@tempboxa\hbox{#1. #2}
  681.  \ifdim \wd\@tempboxa >\hsize
  682.   #1. #2\par
  683.  \else
  684.   \hbox to\hsize{\box\@tempboxa\hfill}
  685.  \fi}
  686.  
  687. \newcounter{figure}
  688. \def\thefigure{\@arabic\c@figure}
  689. \def\fps@figure{tbp}
  690. \def\ftype@figure{2}
  691. \def\ext@figure{lof}
  692. \def\fnum@figure{Fig.\ \thefigure}
  693. \def\figure{\@float{figure}}
  694. \let\endfigure\end@float
  695. \@namedef{figure*}{\@dblfloat{figure}}
  696. \@namedef{endfigure*}{\end@dblfloat}
  697. \def\fstyle@figure{\rm}
  698. \def\fjust@figure{\sloppy}
  699. \def\fcapjust@figure{\sloppy}
  700. \def\fcapsize@figure{\small\bf}
  701. \def\fcapstyle@figure{\small\rm}
  702. \long\def\@makecaption@figure#1#2{\vskip 5.5pt
  703.  \setbox\@tempboxa\hbox{#1. #2}
  704.  \ifdim \wd\@tempboxa >\hsize
  705.   #1. #2\par
  706.  \else
  707.   \hbox to\hsize{\hfil\box\@tempboxa\hfil}
  708.  \fi}
  709.  
  710. \long\def\@caption#1[#2]#3{%
  711.  \addcontentsline{\csname ext@#1\endcsname}{#1}%
  712.  {\protect\numberline{\csname the#1\endcsname}%
  713.   {\ignorespaces #2}}\par
  714.  \begingroup
  715.   \@parboxrestore
  716. % SFB 0.08
  717.   \csname @makecaption@#1\endcsname
  718.    {\csname fcapjust@#1\endcsname
  719.     \csname fcapsize@#1\endcsname
  720.     \csname fnum@#1\endcsname}%
  721.    {\csname fcapstyle@#1\endcsname \ignorespaces #3}
  722.   \par
  723.  \endgroup}
  724. \def\@xfloat#1[#2]{\ifhmode \@bsphack\@floatpenalty-\@Mii
  725.  \else \@floatpenalty-\@Miii \fi
  726.  \def\@captype{#1}%
  727.  \ifinner \@parmoderr\@floatpenalty\z@
  728.  \else \@next\@currbox\@freelist{\@tempcnta\csname ftype@#1\endcsname
  729.   \multiply\@tempcnta\@xxxii\advance\@tempcnta\sixt@@n
  730.   \@tfor \@tempa :=#2\do
  731.    {\if\@tempa h\advance\@tempcnta \@ne\fi
  732.     \if\@tempa t\advance\@tempcnta \tw@\fi
  733.     \if\@tempa b\advance\@tempcnta 4\relax\fi
  734.     \if\@tempa p\advance\@tempcnta 8\relax\fi
  735.    }\global\count\@currbox\@tempcnta}\@fltovf
  736.   \fi
  737.   \global\setbox\@currbox\vbox\bgroup
  738.   \boxmaxdepth\z@
  739.   \csname fstyle@#1\endcsname
  740.   \hsize\textwidth \linewidth\textwidth \@parboxrestore
  741.   \csname fjust@#1\endcsname}
  742.  
  743.  
  744. %  ****************************************
  745. %  *           CUP specials               *
  746. %  ****************************************
  747. %
  748. % received line and accepted line
  749. \def\receivedline{\@ifnextchar [{\rec@arg}{\rec@noarg}}
  750. \def\rec@noarg{\par\noindent{\small\it Received \@date}}
  751. \def\rec@arg[#1]{\par\noindent{\small\it Received #1}}
  752. \newcommand{\acceptedline}[2]{\par\noindent{\small\it
  753.  Accepted in a revised form in #1 by #2}}
  754.  
  755. %  ****************************************
  756. %  *                FLEQN                 *
  757. %  ****************************************
  758. %
  759. % FLEQN DOCUMENT-STYLE OPTION - released 9 March 1987
  760. %    for LaTeX version 2.09
  761. % Copyright (C) 1987 by Leslie Lamport
  762. %
  763. % The following commands make the displayed math environments flush left,
  764. % with an indentation of \mathindent from the prevailing left margin.
  765.  
  766. \def\[{\relax\ifmmode\@badmath\else\begin{trivlist}\item[]\leavevmode
  767.   \hbox to\linewidth\bgroup$
  768.   \displaystyle
  769.   \hskip\mathindent\bgroup\fi}
  770.  
  771. \def\]{\relax\ifmmode \egroup $\hfil
  772.        \egroup \end{trivlist}\else \@badmath \fi}
  773.  
  774. \def\equation{\refstepcounter{equation}\trivlist \item[]\leavevmode
  775.   \hbox to\linewidth\bgroup $
  776.   \displaystyle
  777. \hskip\mathindent}
  778.  
  779.  
  780. \def\endequation{$\hfil
  781.            \displaywidth\linewidth\@eqnnum\egroup \endtrivlist}
  782.  
  783. \def\eqnarray{\stepcounter{equation}\let\@currentlabel=\theequation
  784. \global\@eqnswtrue
  785. \global\@eqcnt\z@\tabskip\mathindent\let\\=\@eqncr
  786. \abovedisplayskip\topsep\ifvmode\advance\abovedisplayskip\partopsep\fi
  787. \belowdisplayskip\abovedisplayskip
  788. \belowdisplayshortskip\abovedisplayskip
  789. \abovedisplayshortskip\abovedisplayskip
  790. $$\halign
  791. to \linewidth\bgroup\@eqnsel\hskip\@centering$\displaystyle\tabskip\z@
  792.   {##}$&\global\@eqcnt\@ne \hskip 2\arraycolsep \hfil${##}$\hfil
  793.   &\global\@eqcnt\tw@ \hskip 2\arraycolsep $\displaystyle{##}$\hfil
  794.    \tabskip\@centering&\llap{##}\tabskip\z@\cr}
  795.  
  796. \def\endeqnarray{\@@eqncr\egroup
  797.  \global\advance\c@equation\m@ne$$\global\@ignoretrue}
  798.  
  799. \newdimen\mathindent
  800. \mathindent = 2pc
  801.  
  802.  
  803. %  ****************************************
  804. %  *            MISCELLANEOUS             *
  805. %  ****************************************
  806. %
  807. % DATE
  808. \def\today{\number\day\ \ifcase\month\or
  809.   January\or February\or March\or April\or May\or June\or
  810.   July\or August\or September\or October\or November\or December
  811.  \fi \ \number\year}
  812.  
  813.  
  814. %  ****************************************
  815. %  *           INITIALIZATION             *
  816. %  ****************************************
  817. %
  818. \ps@headings
  819. \pagenumbering{arabic}
  820. \onecolumn \let\onecolumn=\relax
  821. \def\twocolumn{\typeout{Two column mode not available with FAC style.}}
  822. \flushbottom
  823. \frenchspacing
  824. %\raggedbottom % for testing only
  825.  
  826.